home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / UTIL / TouchMe 1.1.1.sit / touchMe 1.11 Folder / CW9 PP source / source / Common / ErrorMessage.r < prev    next >
Text File  |  1996-08-08  |  3KB  |  125 lines
  1. // ==================================================
  2. //    ErrorMessage.r
  3. //    Copyright (C) 1996 Mizutori Tetsuya, July 4 1996.
  4. // ==================================================
  5. //    All documents are pretty-printed in Geneva 10-point font.
  6.  
  7. #define SystemSevenOrLater    TRUE
  8.  
  9. #include <Types.r>
  10. //#include <SysTypes.r>
  11. //#include <PowerPlant.r>
  12.  
  13. #include "Errors.r"
  14.  
  15.  
  16. // --------------------------------------------------
  17. //    ･ Pascal-Style Error Message String Resources
  18. // --------------------------------------------------
  19. #define        kErrorMessage_ResType        'ErrM'
  20. #define        kErrorMessagex_ResType        'Err#'
  21.  
  22. //*---- ErrM  ･ Pascal-Style String -----*/
  23. type kErrorMessage_ResType {
  24.     pstring;            /* String */
  25. };
  26.  
  27. //*---- Err# ･ Pascal-Style String List -----*/
  28. type kErrorMessagex_ResType {
  29.     integer = $$Countof(StringArray);
  30.     array StringArray {
  31.             pstring;    /* String */
  32.     };
  33. };
  34.  
  35. // --------------------------------------------------
  36. //    ･ File System
  37. // --------------------------------------------------
  38. #define    kErrorMessage_FileSystem        "File"
  39.  
  40. resource kErrorMessage_ResType (
  41.     ioErr, kErrorMessage_FileSystem, purgeable)
  42.     { "I/O error" };
  43.  
  44. resource kErrorMessage_ResType (
  45.     bdNamErr, kErrorMessage_FileSystem, purgeable)
  46.     { "Bad filename" };
  47.  
  48. resource kErrorMessage_ResType (
  49.     fnfErr, kErrorMessage_FileSystem, purgeable)
  50.     { "File not found" };
  51.  
  52. resource kErrorMessage_ResType (
  53.     dirNFErr, kErrorMessage_FileSystem, purgeable)
  54.     { "Directory not found" };
  55.  
  56. resource kErrorMessage_ResType (
  57.     opWrErr, kErrorMessage_FileSystem, purgeable)
  58.     { "File already open for writing" };
  59.  
  60. resource kErrorMessage_ResType (
  61.     permErr, kErrorMessage_FileSystem, purgeable)
  62.     { "Attempt to open locked file for writing" };
  63.  
  64. resource kErrorMessage_ResType (
  65.     wrPermErr, kErrorMessage_FileSystem, purgeable)
  66.     { "Write permittions does not allow writing" };
  67.  
  68. resource kErrorMessage_ResType (
  69.     fLckdErr, kErrorMessage_FileSystem, purgeable)
  70.     { "File is locked" };
  71.  
  72. resource kErrorMessage_ResType (
  73.     vLckdErr, kErrorMessage_FileSystem, purgeable)
  74.     { "Volume is locked or read-only" };
  75.  
  76. resource kErrorMessage_ResType (
  77.     wPrErr, kErrorMessage_FileSystem, purgeable)
  78.     { "Diskette is write-protected" };
  79.  
  80.  
  81. // --------------------------------------------------
  82. //    ･ Error Box
  83. // --------------------------------------------------
  84. #define ALRT_ErrorBox            9000
  85. #define ALRT_ErrorBoxTitle        "Error Box"
  86.  
  87. resource 'DITL' (ALRT_ErrorBox, ALRT_ErrorBoxTitle, purgeable) {
  88.     {
  89.         {152, 143, 172, 201},
  90.         Button { enabled, "OK" },
  91.  
  92.         {1152, 264, 1172, 322},
  93.         Button { enabled, "Cancel" },
  94.  
  95. //        {12, 20, 44, 52},
  96. //        Icon { disabled, 1 },
  97.  
  98.         {12, 72, 44, 272},
  99.         StaticText { disabled, "Error Diagnosis" },
  100.  
  101.         {52, 72, 148, 328},
  102.         StaticText { disabled,
  103.             "Category: ^0¥n"
  104.             "Code: ^1¥n"
  105.             "Status: ^2¥n"
  106.             "^3"
  107.         }
  108.     }
  109. };
  110.  
  111.  
  112. resource 'ALRT' (ALRT_ErrorBox, ALRT_ErrorBoxTitle, purgeable) {
  113.     {51, 95, 231, 439},
  114.     ALRT_ErrorBox,
  115.     {
  116.         OK, visible, silent,
  117.         OK, visible, silent,
  118.         OK, visible, silent,
  119.         OK, visible, silent
  120.     },
  121.     alertPositionMainScreen
  122. };
  123.  
  124. // end of resources
  125.